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QUICK REFERENCE 



© Copyright 1985 
Zedc»rlnc. 



Standard Commands 



APPEND Hne#f 

AUTO [ start [,incr]] 

DEL, DELETE lines 

DIR fdrivespec] 

EDIT.E or .[line] 

RND [#] string 

HELP 

LIST , L [+ T line or label 

LLIST [+T lines 

LOAD H filename 

MEM [ORY] 

MERGE [ j fitenarne 

NEW 

QUIT 

RENUM [new ,ofel ,incr] 

RUN [fitename ] 

RUN [fHenafTie J 

RUN + [ filename] 

SAVE 

SAVE* 

SAVE + I 



Append a no iwe# program ^ l&ie# 
Auto line# for inserting Ines 
Delete line(s) from program h mem 
Displays DISK [drive] Directory 
Edits current or pine#J. See e Editor 
Find string or lhe# hi pgm. ';* finds next 
Displays a list of CMD's 
Lists to Display [* ]=HighIight cmcrs 
Lists to Printer [+]=noline# 
Load Program. [* ]=Condense Pgm 
Displays memory utilization 
Merge ASCII ZBasic program 



ExK ZBasic to System 
Renumbers program wi memory 
Execute from Memory or [Disk file] 
Compile & Save object code 
Compile & Save Chain object code 
Save program ZBasic Tokenked 
Save program in ASCII with line #*s 
Save program in ASCII no line#"s 



Standard Line Editor 

<Break> or <CTRL C> Abort all changes and exit Line Edit mode. 

In] <BKSPACE> Move cursor backwards [n] characters 

<ENTER> Accept & insert EDITED line 

<ESC>ape Abort C,H,I,K,S,X commands 

tn] <SPACE> Move cursor forward [n] characters 

A Abort and re-load line to EDIT 
[n] C <Key[s]> Change [n] characters to <Key[-sl> 

[ n ] D Delete [n] char(s) from cursor to the right 

H Hack to Qtixi of Iwte and enter insert mode, 

I Insert characters at current cursor position 

[n] K <Key> Delete to [n]th occurence of <Key> 

L List remainder of line and start EDIT again 

[n] s <Key> Move cursor to [n]th occurence of <Key> 

X Go to end of line and enter insert mode. 



To edit a line: EDIT (or E) line Number or Label n defaults to 1 
7=EDIT current line, V=LIST current line, 7=LIST 10 lines 



String Functions SK 



Returns the following 
or Number 



ASC(str$) 
B1N$ (expr) 
CHR$(expr) 
DATES 
HEX${expr) 
INDEX$ (expr) 
INSTR(pos,v1$,v2$) 
LEN (string!) 
LEFT$ (str$,len) 
MID$ (str$,pos [ ,len] ) 
MKB$ (expr) 
MKI$ (expr) 
OCT$ (expr) 
PSTR$ (expr) 
RIGHTS (str$,len) 
SPACES (expr) 
STR$ (expr) 
STRINGS (expr.char) 
TIMES 

UCASES (str$) 
UNSS(expr) 



ASCII value of the 1st char in a string. 

16 char Binary "bbbbbbbbbbbbbcbb", b=0/1 

String = ASCII of expr, CHR$(65)="A" 

Date in MM/DD/YY format "08/11/85" 

4 character HEX string " 0000" to "FFFF 

String at INDEX$(expr) 

Finds v2$ in v1$ Start=pos ,0=Not found 

Length from to 255 of string 

String of ten from left side of str$ 

String starting at pos for ten 

BCD binary string of double precision 

2 chr Integer binary string 

6 chr string of octal "00000" to "37777T 

String pointed to by address expr 

Len characters from right side 

String of expr spaces 

Numeric String for expr like "-1 23.456" 

String of length expr all char's ■•"«"*" 

Time in HH:MM:SS format "03:01 :45" 

Str$ all tower case returned as upper 

Unsigned 5 digit int. UNS$(-1)="65535" 



Program Statements 



CLEAR 

CLEAR number 

CLEAR END 

CLEAR INDEXS 

DATA Rem[,Hem.] 

DEFINT var, var-var 

DEFSNG var,var-var 

DEFDBL var,var-var 

DEFSTR var,var-var 

DEF FN name [ (var[s]...) ] 

DEF LEN [=] expr 

DELAY [=] expr 

DIM [len] var[(num..)][,...] 

DO... UNTIL cond 

ELSE 

END 

END IF 

ENDFN[ = expr] 

FN name [ { expi"s...) ] 

FORvar = xTOy [STEPz] 

GOSUB line or label 

GOTO lineorlabel 

IF cond THEN...ELSE 

INDEXS (expr)=string 

INDEX$l(expr)=string 

lNDEX$D(expr) 

[LET] var = expression 

LONG FN name [ (v.) ] 

LONG IF cond 

MID$ (v$,pos,len) = str$ 

NEXT[v[,v..J] 

ONx GOSUB L1.L2 

ON x GOTO L1.L2 

PSTR$(V%)="string" 

RANDOM [expr] 

READ var,PSTR$(v%) 

REM Remark stuff..., 

RESTORE [item#] 

RETURN [line] 

SOUND freq.durat ion 

STEP expr 

STOP 

SWAP var.var 

TRON[,X,B,S] 

UNTIL cond 

WEND 

WHILE cond 

XELSE 



Clears al va/s to 0's and ten var$ 
Alocates INDEXS memory 
Clears for vanables not common'ed 
Clears INDEXS to all rwls 
Store In data table for READ 
Set variable default type Integer % 
Set variable default type Single ! 
Set variable default type Double # 
Set variable default type String $ 
Defines a function by name 
Sets string var"s Max length 
Delay expr mHliseconds 1/1000 sec 
Assign arrays & variables 
Loops UNTIL cond TRUEoO 
Else executed H IF cond is FALSE 
Ends program execution 
Ends "LONG IF 

Ends 'LONG FN* [ Returns expr ] 
Executes function by name 
Loops at least once from NEXT 
Subroutine line* or "taber 
Continue exec at Bne# or "taber 
True if condoO else false 
Replace INDEXS(expr) 
Insert at INDEX$(expr) 
Deletes INDEXS(expr) 
Sets var to expression 
Multi line Funtton Definition 
MuRi line 'IP construct start 
Sets middle pos of V$ for ten = str$ 

erminaies run loop's.. .J 
IF x=1 THEN GOSUB L1line# or label 
IF x=2 THEN GOTO L2 line# or label 
Sets V% to point to "string" 
Sets random # seed. 
DATA into 



Point to 1 st or [expr] DATA item 
Return from GOSUB [Skip/GOTO] 
Sound of freq hz.ms duration 
Changes Default STEP+1 FOR/NEXT 
^op and print Break in nrmnnn 
Swap contents of 2 Vanables 
Debug,<B>reak & <S>ingle step 
Endof DO loop (TRUE else Loop. 
Marks End of WHILE loop 
Loop WHILE expr is TRUE 
ELSE for 'LONG IF 



Machine Specific Commands 

CALL nnnnn or LINE line CALL'S addr nnnnn or MACHLG line 
DEF USR digit = address Sets USR CALL address to expr 
INP (port) Reads Byte data from I/O port 

1 IMC linn Onfttmxt C*n«* **j4W»n*>#> f^MmnilnW I Inn 

line: line neiurns ©tan aaoress wornpiieo Line. 

OUT port.data Outputs DATA to I/O PORT 

PEEK [WORD] (addr) Byte or WORD memory read addr. 

POKE [WORD] addr.d Byte or WORD memory Write addr. 

MACHLG byte.word.var Creates Inline CODE to execute 

USR digit (expr) USR Statement&Function.O to 9 

8086 versions replace SEG with addr[,segment] for PEEK & POKE 
Special note for 32 bit versions of ZBasic 3.0: 
POKE LONG & PEEK LONG are 32 bit Memory READ & WRITE 
32bit Double INTEGER Variable type using var& or DEFDBLINT 



Numbers and Ranges Memory Reared 

Minumum Maximum °' m * 



Type 

Integer 

ReaKBCD] 

Hex 

Octal 

Binary 



-32768 
-9.999E+63 
&H0000 
&O000000 



+32767 
+9.999E+63 
&HFFFF 
&0377777 



2 

2(0 28 
2 
2 
2 



aXHaboboboDbbbbbbb b«0 or 1 
OVERFLOW ERRORS: BCD: 9.99999E+63, INTEGER: NONE 
Strings of CHR$(0 to 255), LEN from to 255 char, (See DEF LEN) 
BCD Accuracy for Single, Double & Scientific: 6 to 54 digits 



Math Operators 

A or [ Raise to the power (REAL) 

+ - • / \ Ack!,Sub,Mult t Divide,Divide (REAL) 

AND OR XOR Binary & Conditional operators 

MOD Remainder of a division 

NOT Binary & Conditional operator 

<,=,>,<=,=<,>«,=>,<> Conditional operators 0«false,-1 -TRUE 

«,» Shift Left *2 A int., Shift Right /2 A int. 

Variable types: %-lnteger !=S'mgle #«Double $<=SWng 



Numeric Functions J^rr^'lT" 9 

Numeric Result: 

ABS (expr) Absolute Value of expr always positive. 

ASC (str$) ASCII value of 1 st character in string 

ATN (expr) Arctangent in radians of expr (REAL) 

COS (expr) COSINE of expr in radians (REAL) 

CVI (str$) INTEGER value of 1 st 2 bytes in string 

EXP (expr) Returns e^xpr (REAL) 

FIX (expr) Truncates digits right of d.p. (REAL) 

FRAC(expr) Truncates digits left ofd.p, (REAL) 

INDEXF(str[,s]) Finds leading str in INDEX$ starting at s 

INT (expr) Truncates digits right of d.p. 

LOG (expr) Natural log of the expr (REAL) 

MAYBE or -1 , random 50% of the time 

MEM Room in bytes available in INDEX$ area 

PAGE Present line on printer page starting at 

POS (0,1 ,2) Character Position of screen printer. Disk 

RND (expr) Random # from 1 to expr 

SGN (expr) Sign of expr -1 if neg.O if zero,+1 if positive 

SIN (expr) SINE of expr in racfians (REAL) 

SQR(expr) SQUARE ROOT of expr (REAL) 

TAN (expr) TANGENT of expr in radians (REAL) 

VAL (str$) Converts Numeric String to number 

VARPTR (var) ADDRESS of the variable in memory. 

INTEGER is assumed unless a REAL number, var or function used 



Device Independent Graphics 



Q CIRCLE h,v,r 


□ 


BOX 


H CIRCLE FILL 


n 


BOX FILL 


[^ circle TO 


/ 


PLOT TO 


^ circle PLOT 


• 


PLOT 




COLOR Black-0, -1=Whfte MODE Even=Char, Odd=Graphics 



Standard 



Coordinates 

► 



X,Y X 

256 512 768 1023 

Y o 





Graphics Instructions 



BOX I x.y ] [ TO x,y..] 
BOX FILL [x,y ] [TO x,y... 
CIRCLE x,y,r 
CIRCLE FILL x.y.r 
CIRCLE x.y.r TO s,n 
CIRCLE x,y,r PLOT s,n 
COLOR [-] color 
FILL x,y 

MODE expr 0-15 
PLOT [TO] x,y [TOx.y...] 
POINT ( x,y ) 
RATIO xAspect.yAspect 
SOUND freq,duration 



Empty BOX x,y opposite corners 
Solid BOX x,y opposite corners 
Empty Circle at x.y center of radius r 
Solid Circle at x.y of radius r 
Pie segment s»start,n»# of BRAD'S 
Arc Segment s=start,n=# of BRAD'S 
Color to be used 0=Black,-1=Wh"rte 
Fis graphic area around x,y 
Sets Screen, MODE 7=*High Res 
Plots point or draw line point TO point 
Returns COLOR at x,y 
CIRCLE aspect ratio ±127 
Outout sound hertz.milliseconds 



Screen Coordinates: 0,0=upper left, 1023,767-lower right 

51 2,384=Screen center. BRAD'S from to 256 - to 360 degrees 

Also see Cursor Positioning and Standard Screen Coordinates 



Cursor Positioning (vpos) 

@( x .y) Puts cursor at position x char's from left on line y 
%(x.y) Puts cursor at X horiz, y vert' GRAPHIC coordinate 

@ and % may be used with PRINT, INPUT and LINEINPUT 



LOCATE x.y [,cur] Set x,y cursor positron [cursor -1=on/0=offJ 



Input/Output Instructions 



Disk File Commands 



CLS 

CLS [char.] 

CLS LINE 

CLS PAGE 

DEF TAB [-] expr 

INPUT [vpos] [&maxlen,] [!] [;] 

LINE INPUT [vpos] [&maxlen,] 

INKEY$ 

LPRINT stuff 

PAGE len.page.top margin 

PRINT [vpos] stuff... 

SPC(expr) 

TAB(expr) 

USING str$,expr 

WIDTH [-] width 

WIDTH LPRINT W width 



Clears Screen 
Clears Screen with Char's 
Clears from cursor to end of line 
Clears from cursor to end of page 
Sets comma TAB sto ps. Default=1 6 
[ "string"; ] v [,v...] ^See Notes 
[I] [;] ["string";] v$ ^ at Bottom 
KEY$ if pressed else "" null. 
Print to PRINTER device 
LPRINT & LLIST Page formatting 
Prints to DISPLAY device 
Prints expr spaces 
Move cursor to character position 
Formats Numeric Quantitys 
Sets PRINT width 
Sets LPRINT width 



vpos-See cursor positioning. &maxlen»Maximum # of key's 

l-accept Bne after maxlen char's entered ; -Surpress <crxlf> 

Notes: 



ERROR - expr 

ERROR 

CLOSE [ Fnum [.Fnum ] ] 

INPUT # Fnum,var[.var..] 

KILL filename 

LINE INPUT#1hum,v$ 

LOC (fnum) 

LOF (fnum) 

ON ERROR GOSUB line 

OPEN "I.O,R",Fnum,"file" [,ri] 

PRINT # Fnum,stuff 

READ # Fnum,v,v$;length 

REC (fnum) 

RECORD fnum,rec[,loc] 

RENAME old TO new 

ROUTE expr or Fnum 

RUN [Fnum] 

WRITE#fnum,v,v$;len 



Sets disk error number 
Returns DISK error Number 
Closes all files or [ Fnum(s) ] 
Reads ASCII file into var[s] 
Variables or "string" 
Gets ASCII string into var$ 
Returns location in Disk record. 
Returns File size in records 
Error vector [RETURN or 65535] 
Opens "file" as Fnum with rec len=rl 
Prints stuff in ASCII to DISK 
Reads binary info from DISK 
Returns Current DISK Record # 
Position for next DISK operation 
Renames old to new Filenames 
Routes PRINT, 0=Video,128=Printer 
RUN or RUN fnum chain files 
Writes Binary info to DISK 



